home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / Bonus / DBaldwin / htmllite.exe / htmldemo.exe / 0 / RCDATA / TFONTFORM / TFONTFORM.txt
Encoding:
Text File  |  2001-06-24  |  3.2 KB  |  168 lines
  1. object FontForm: TFontForm
  2.   Left = 199
  3.   Top = 153
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsDialog
  6.   Caption = 'Edit Default Font and Colors'
  7.   ClientHeight = 339
  8.   ClientWidth = 307
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'System'
  12.   Font.Style = []
  13.   PixelsPerInch = 96
  14.   OnCreate = FormCreate
  15.   OnShow = FormShow
  16.   TextHeight = 16
  17.   object Label1: TLabel
  18.     Left = 225
  19.     Top = 7
  20.     Width = 66
  21.     Height = 16
  22.     Caption = '&Font Color'
  23.     FocusControl = FontColorGrid
  24.   end
  25.   object Label2: TLabel
  26.     Left = 225
  27.     Top = 99
  28.     Width = 65
  29.     Height = 16
  30.     Caption = '&Link Color'
  31.     FocusControl = HotSpotColorGrid
  32.   end
  33.   object Label3: TLabel
  34.     Left = 225
  35.     Top = 189
  36.     Width = 61
  37.     Height = 16
  38.     Caption = 'Font &Size'
  39.     FocusControl = FontSizeEdit
  40.   end
  41.   object Label4: TLabel
  42.     Left = 9
  43.     Top = 200
  44.     Width = 70
  45.     Height = 16
  46.     Caption = 'Font &Name'
  47.     FocusControl = FontListBox
  48.   end
  49.   object Label5: TLabel
  50.     Left = 122
  51.     Top = 200
  52.     Width = 77
  53.     Height = 16
  54.     Caption = '&Background'
  55.     FocusControl = BackListBox
  56.   end
  57.   object FontListBox: TListBox
  58.     Left = 11
  59.     Top = 217
  60.     Width = 87
  61.     Height = 115
  62.     Font.Color = clBlack
  63.     Font.Height = -11
  64.     Font.Name = 'MS Sans Serif'
  65.     Font.Style = []
  66.     ItemHeight = 13
  67.     ParentFont = False
  68.     Sorted = True
  69.     TabOrder = 0
  70.     OnClick = ListBoxClicks
  71.   end
  72.   object FontColorGrid: TColorGrid
  73.     Left = 225
  74.     Top = 23
  75.     Width = 72
  76.     Height = 72
  77.     ClickEnablesColor = True
  78.     ForegroundIndex = -1
  79.     ForegroundEnabled = False
  80.     BackgroundEnabled = False
  81.     Selection = 3
  82.     TabOrder = 2
  83.     TabStop = True
  84.     OnChange = FontColorGridChange
  85.   end
  86.   object HotSpotColorGrid: TColorGrid
  87.     Left = 225
  88.     Top = 114
  89.     Width = 72
  90.     Height = 72
  91.     ClickEnablesColor = True
  92.     ForegroundIndex = -1
  93.     ForegroundEnabled = False
  94.     BackgroundEnabled = False
  95.     TabOrder = 3
  96.     TabStop = True
  97.     OnChange = HotSpotColorGridChange
  98.   end
  99.   object BackListBox: TListBox
  100.     Left = 122
  101.     Top = 217
  102.     Width = 87
  103.     Height = 115
  104.     Font.Color = clBlack
  105.     Font.Height = -11
  106.     Font.Name = 'MS Sans Serif'
  107.     Font.Style = []
  108.     ItemHeight = 13
  109.     ParentFont = False
  110.     TabOrder = 1
  111.     OnClick = ListBoxClicks
  112.   end
  113.   object OKButton: TButton
  114.     Left = 234
  115.     Top = 274
  116.     Width = 54
  117.     Height = 25
  118.     Caption = 'O&K'
  119.     Default = True
  120.     ModalResult = 1
  121.     TabOrder = 5
  122.   end
  123.   object Cancel: TButton
  124.     Left = 234
  125.     Top = 301
  126.     Width = 54
  127.     Height = 25
  128.     Caption = 'Cancel'
  129.     ModalResult = 2
  130.     TabOrder = 7
  131.   end
  132.   object ResetButton: TButton
  133.     Left = 234
  134.     Top = 246
  135.     Width = 54
  136.     Height = 25
  137.     Caption = '&Reset'
  138.     TabOrder = 6
  139.     OnClick = ResetButtonClick
  140.   end
  141.   object FontSizeEdit: TSpinEdit
  142.     Left = 228
  143.     Top = 214
  144.     Width = 65
  145.     Height = 26
  146.     MaxValue = 24
  147.     MinValue = 6
  148.     TabOrder = 4
  149.     Value = 12
  150.     OnChange = ListBoxClicks
  151.   end
  152.   object FontViewer: ThtmlLite
  153.     Left = 15
  154.     Top = 16
  155.     Width = 193
  156.     Height = 177
  157.     Cursor = 2
  158.     ViewImages = False
  159.     TabOrder = 8
  160.     BorderStyle = htSingle
  161.     HistoryMaxCount = 0
  162.     DefFontName = 'Times New Roman'
  163.     DefPreFontName = 'Courier New'
  164.     NoSelect = False
  165.     ScrollBars = ssVertical
  166.   end
  167. end
  168.